/*
 * To change this template, choose Tools | Templates
 * and open the template in the editor.
 */
package servlet;

import bean.ShoppingCartLocal;
import entity.Prodotto;
import entity.Utenti;
import facade.ProdottoFacadeLocal;
import facade.UtentiFacadeLocal;
import java.io.IOException;
import java.util.ArrayList;
import java.util.logging.Level;
import java.util.logging.Logger;
import javax.annotation.Resource;
import javax.ejb.EJB;
import javax.jms.Connection;
import javax.jms.ConnectionFactory;
import javax.jms.JMSException;
import javax.jms.Message;
import javax.jms.MessageProducer;
import javax.jms.ObjectMessage;
import javax.jms.Queue;
import javax.jms.Session;
import javax.servlet.RequestDispatcher;
import javax.servlet.ServletException;
import javax.servlet.http.HttpServlet;
import javax.servlet.http.HttpServletRequest;
import javax.servlet.http.HttpServletResponse;
import javax.servlet.http.HttpSession;

/**
 *
 * @author erola
 */
public class CheckoutHandler extends HttpServlet {

    @Resource(name = "jms/WLMessage")
    private Queue wLMessage;
    @Resource(name = "jms/WLMessageFactory")
    private ConnectionFactory wLMessageFactory;
    @EJB
    private ShoppingCartLocal carrelloFacade;
    @EJB
    private ProdottoFacadeLocal prodottoFacade;
    @EJB
    private UtentiFacadeLocal utentiFacade;

    /**
     * Servlet principale che smista tutte le richieste, a seconda del parametro
     * action
     * @param request servlet request
     * @param response servlet response
     * @throws ServletException se avviene un errore a livello di servlet
     * @throws IOException se avviene un errore I/O
     */
    protected void processRequest(HttpServletRequest request, HttpServletResponse response)
            throws ServletException, IOException {
        RequestDispatcher rq = null;
        if (request.getParameter("action") != null && request.getParameter("action").equals("checkout")) {
            try {
                checkout(request);
            } catch (Exception e) {
                request.setAttribute("err", "Errore nella fase di checkout.");
            } finally {
                rq = request.getRequestDispatcher("/checkout.jsp");

            }
        } else if (request.getParameter("action") != null && request.getParameter("action").equals("conferma")) {
            try {
                conferma(request);
            } catch (Exception e) {
                request.setAttribute("err", "Non hai credito sufficiente." + e.toString());
            } finally {
                rq = request.getRequestDispatcher("/account.jsp");

            }
        }
        rq.forward(request, response);
    }

    /**
     * Questo metodo prende la richiesta Http e le aggiunge dei
     * parametri (prodotti, indirizzo di spedizione, totale...)
     * @param request
     */
    protected void checkout(HttpServletRequest request) {
        HttpSession session = request.getSession();
        carrelloFacade = (ShoppingCartLocal) session.getAttribute("carrello");
        ArrayList<Prodotto> prodotti = carrelloFacade.getProdotti();
        double spedizione = 10.0;
        double totale = 0;
        int indirizzi = 0;
        for (int i = 0; i < prodotti.size(); i++) {
            totale += prodotti.get(i).getPrezzo();
            if (prodotti.get(i).getDescrizione() != null) {
                indirizzi++;
            }
        }
        if (prodotti.size() > indirizzi) {
            indirizzi++;
        }
        totale = totale + (indirizzi * spedizione);
        request.setAttribute("prodotti", prodotti);
        request.setAttribute("indirizzi", indirizzi);
        request.setAttribute("spedizione", spedizione);
        request.setAttribute("totale", totale);
    }

    /**
     * Questo metodo scala definitivamente il credito di un utente che ha
     * confermato l'acquisto e notifica la transazione eseguita
     * @param request
     * @throws Exception
     */
    protected void conferma(HttpServletRequest request) throws Exception {
        HttpSession session = request.getSession();
        Long uid = Long.valueOf((String) session.getAttribute("user_id"));
        Utenti u = utentiFacade.find(uid);
        String str = request.getParameter("totale");
        double totale = Double.parseDouble(str);
        double credito = u.getConto();
        if (totale > credito) {
            throw new Exception(str);
        }
        double conto = credito - totale;
        u.setConto(conto);
        utentiFacade.edit(u);
        cancellaRegaliWL();
        carrelloFacade.initialize();
        session.setAttribute("carrello", carrelloFacade);
        session.setAttribute("credito", conto);
        request.setAttribute("msg", "Transazione eseguita.");
    }

    /**
     * Questo metodo notifica a Wishlister l'acquisto di determinati prodotti,
     * che verranno cancellati da Wishlister
     */
    private void cancellaRegaliWL() {
        //invia messaggio a WishLister
        ArrayList<Prodotto> prodotti = carrelloFacade.getProdotti();
        for (int i = 0; i < prodotti.size(); i++) {
            if (prodotti.get(i).getDescrizione() != null) {
                //invia messaggio a WishLister
                Prodotto p = prodotti.get(i);
                String msg = "";
                msg += (p.getDescrizione().split(":"))[1] + ":";
                msg += p.getNome();
                try {
                    sendJMSMessageToWLMessage(msg);
                } catch (JMSException ex) {
                    Logger.getLogger(CheckoutHandler.class.getName()).log(Level.SEVERE, null, ex);
                }
            }

        }
    }

    // <editor-fold defaultstate="collapsed" desc="HttpServlet methods. Click on the + sign on the left to edit the code.">
    /**
     * Handles the HTTP <code>GET</code> method.
     * @param request servlet request
     * @param response servlet response
     * @throws ServletException if a servlet-specific error occurs
     * @throws IOException if an I/O error occurs
     */
    @Override
    protected void doGet(HttpServletRequest request, HttpServletResponse response)
            throws ServletException, IOException {
        processRequest(request, response);
    }

    /**
     * Handles the HTTP <code>POST</code> method.
     * @param request servlet request
     * @param response servlet response
     * @throws ServletException if a servlet-specific error occurs
     * @throws IOException if an I/O error occurs
     */
    @Override
    protected void doPost(HttpServletRequest request, HttpServletResponse response)
            throws ServletException, IOException {
        processRequest(request, response);
    }

    /**
     * Returns a short description of the servlet.
     * @return a String containing servlet description
     */
    @Override
    public String getServletInfo() {
        return "Short description";
    }// </editor-fold>

    /**
     * Questo metodo crea il messaggio JMS da inviare a Wishlister
     * @param session
     * @param messageData
     * @throws JMSException
     */
    private Message createJMSMessageForjmsWLMessage(Session session, Object messageData) throws JMSException {
        ObjectMessage tm = session.createObjectMessage();
        String tmp = messageData.toString();
        String username = tmp.split(":")[0];
        String regalo = tmp.split(":")[1];
        tm.setStringProperty("username", username);
        tm.setStringProperty("regalo", regalo);
        return tm;
    }

    /**
     * Questo metodo invia il messaggio JMS a Wishlister
     * @param messageData
     * @throws JMSException
     */
    private void sendJMSMessageToWLMessage(Object messageData) throws JMSException {
        Connection connection = null;
        Session session = null;
        try {
            connection = wLMessageFactory.createConnection();
            session = connection.createSession(false, Session.AUTO_ACKNOWLEDGE);
            MessageProducer messageProducer = session.createProducer(wLMessage);
            messageProducer.send(createJMSMessageForjmsWLMessage(session, messageData));
        } finally {
            if (session != null) {
                try {
                    session.close();
                } catch (JMSException e) {
                    Logger.getLogger(this.getClass().getName()).log(Level.WARNING, "Cannot close session", e);
                }
            }
            if (connection != null) {
                connection.close();
            }
        }
    }
}
